#define quickread
#ifdef quickread
#include <cstdio> 
template <typename T>
inline void read(T& x)
{
    int c=getchar(), f=1; x=0;
    while(c<'0'||'9'<c) {if(c=='-') f=-1; c=getchar();}
    while('0'<=c&&c<='9') 
        x=(x<<3)+(x<<1)+c-'0', c=getchar();
    x*=f;
}
template <typename T>
inline void quickwrite(T x)
{
    if(x<0) putchar('-'), x*=-1;
    if(x>=10) quickwrite(x/10);
    putchar(x%10+'0');
}
#else 
#include <iostream>
#endif
#include <algorithm>
using namespace std;
#define DEBUG
const int N=5010;
int n, a[N], b;
long long ans;
void init()
{
    read(n);
    for(int i=1; i<=n; i++) read(a[i]);
    sort(a+1, a+1+n);
    b=a[n];
    // n--;
    ans=0;
}

void solve()
{
    init();
    if(n==3&&(a[1]+a[2])<=b) {puts("0"); return;}
    else if(n==3&&(a[1]+a[2])>b) {puts("1"); return;}
    
    if(a[n-3]+a[n-2]+a[n-1]<=b) {puts("0"); return;} //最大的三个值小于

    //a[i]+a[j]+a[k]>b a[i]+a[j]>a[k]
    //a[i]+a[j]+a[k]>max(a[n], 2*a[k]) i j k
    //a[i]>max(a[n], 2*a[k])-a[j]-a[k]
    //枚举j k 找[min(i), j]之间符合条件的i
    for(int k=1; k<=n; k++)
        for(int j=1; j<k; j++) 
        {
            int ai=max(b, a[k]<<1)-a[j]-a[k];
            int i=upper_bound(a+1, a+j+1, ai)-a; //在[1, j)之间找
            if(i==0||i>=j) continue; //i不存在
            // printf("id[%d, %d, %d] a[][%d %d %d] ai:%d ans+=%d\n", i, j, k, a[i], a[j], a[k], ai, j-i+1);
            ans+=j-i;
        }
            
    quickwrite(ans); puts("");
}

// #undef DEBUG
signed main()
{
    #ifdef DEBUG
        freopen("../in.txt", "r", stdin);
        freopen("../out.txt", "w", stdout);
    #endif
    #ifndef quickread
    ios::sync_with_stdio(0);
    cin.tie(0); cout.tie(0);
    #endif

    int T=1; scanf("%d", &T);
    while(T--) 
    {
        solve();
    }
    return 0;
}
